figure(1)
FigureTitle = 'Figure7_MajorElement';
set(gcf,'name',regexprep(FigureTitle,'\_*','-'))

figure(20)
FigureTitle = 'Figure8BC_TraceElementRatios';
set(gcf,'name',regexprep(FigureTitle,'\_*','-'))

figure(31)
FigureTitle = 'Figure8A_SpiderDiagram_Fractionated';
set(gcf,'name',regexprep(FigureTitle,'\_*','-'))